* Table 1 
sort quartile
by quartile: tab gender
by quartile: tab gender
oneway gender quartile , sidak

* Table 2: 
sort authortotal
by authortotal : tab gender
oneway gender chapter , sidak

* Table 3:
sort chapter
by chapter: tab gender
by chapter: tab gender
oneway gender chapter if( chapter<7) , sidak

* Table 4:
logit gender i.quartile i.chapter i.authortotal if( chapter<7)

* Figure 1: 
margins, at(quartile =( 1 2 3 4 ))
marginsplot, recast (scatter)

* Figure 2:
margins, at( authortotal =( 1 2 3  ))
marginsplot, recast (scatter)

* Figure 3:
margins, at(chapter =( 1 2 3 4 5 6 ))
marginsplot, recast (scatter)
